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This Technical Note discusses methods for allocating buffers which will not be arbitrarily 
deallocated in BASIC.SYSTEM. 



Section A. 2.1 of the ProDOS 8 Technical Reference Manual describes in detail how an 
application may obtain a buffer from BASIC.SYSTEM for its own use. The buffer will be 
respected by BASIC.SYSTEM, so if you choose to put a program or other executable code in 
there, it will be safe. 

However, BASIC.SYSTEM does not provide a way to selectively deallocate the buffers it has 
allocated. Although it is quite easy to allocate space by calling GETBUFR ($BEF5) and also 
quite easy to deallocate by calling FREEBUFR ($BEF8), it is not so easy to use FREEBUFR to 
deallocate a particular buffer. 

In fact, FREEBUFR always deallocates all buffers allocated by GETBUFR. This is fine for 
transient applications, but a method is needed to protect a static code buffer from being 
deallocated by FREEBUFR for a static application. 

Location RSHIMEM ($BEFB) contains the high byte of the highest available memory location for 
buffers, normally $96. FREEBUFR uses it to determine the beginning page of the highest (or 
first) buffer. By lowering the value of RSHIMEM immediately after the first call to GETBUFR, 
and before any call to FREEBUFR, we can fool FREEBUFR into not reclaiming all the space. So 
although it is not possible to selectively deallocate buffers, it is still possible to reserve space that 
FREEBUFR will not reclaim. 

Physically, we place the code buffer between BASIC.SYSTEM and its buffers, in the space from 
$99FF down. 

After creating the protected static code buffer, we can call GETBUFR and FREEBUFR to 
maintain temporary buffers as needed by our protected module. FREEBUFR will not reclaim the 
protected buffer until after RSHIMEM is restored to its original value. 
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The following is a skeleton example which allocates a two-page buffer for a static code module, 
protects it from FREEBUFR, then deprotects it and restores it to its original state. 



START 



LDA #$02 
JSR GETBUFR 
LDA RSHIMEM 
SEC 

SBC #$02 
STA RSHIMEM 
JSR FREEBUFR 



;get 2 pages 



;get current RSHIMEM 
; ready for sub 
; minus 2 pages 

;save new val to fool FREEBUFR 
; CALL FREEBUFR to deallocate. 



At this point, the value of RSHIMEM is the page number of the beginning of our protected buffer. 
The static code may now use GETBUFR and FREEBUFR for transient file buffers without fear of 
freeing its own space from RSHIMEM to $99FF. 

To release the protected space, simply restore RSHIMEM to its original value and perform a JSR 
FREEBUFR. 



END 



LDA RSHIMEM 
CLC 

ADC #2 

STA RSHIMEM 

JSR FREEBUFR 

RTS 



;get current val 
; ready for ADD 
;give back 2 pages 
;tell FREEBUFR about it 
;DO FREEBUFR 



You can reserve any number of pages using this method, as long as the amount you reserve is 
within available memory limits. 



Further Reference 

• ProDOS 8 Technical Reference Manual 
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